Release 10.1A: OpenEdge Data Management:
DataServer for ORACLE

Retrieving return codes

You can create a stored procedure that provides return code information. For example, it might indicate whether the stored procedure was successful or whether it encountered an error condition.

Example 3–4 shows how the 4GL code runs the stored procedure pcust. It uses the PROC-STATUS function and the CLOSE STORED-PROC to retrieve the return code and assign the value to the variable stat.

/* Return status */ DEFINE VAR stat AS INT. RUN STORED-PROC pcust (PARAM num = ?, OUTPUT PARAM orders = 0, OUTPUT PARAM states = 0). CLOSE STORED-PROC pcust stat = PROC-STATUS. IF stat = 0 THEN DISPLAY pcust.orders pcust.states. ELSE DISPLAY stat.

Example 3–4: Progress 4GL code running the stored procedure pcust

The ORACLE return codes have a range of values between –20000 and –20999. These values are user defined and you can test for them with the PROC-STATUS function.